home *** CD-ROM | disk | FTP | other *** search
/ Winzipper / Winzipper_ISO.iso / nt4.0 server / OEMNADDE.IN_ / oemnadde.inf
INI File  |  1996-07-12  |  23KB  |  619 lines

  1. [Identification]
  2.     OptionType = NetAdapter
  3. [PlatformsSupported]
  4.     ISA
  5.     EISA
  6.         "Jazz-Internal Bus"
  7. [Options]
  8.     DECSTAT
  9. [SlotChoices]
  10. Slot_0 = 0
  11. Slot_1 = 1
  12. Slot_2 = 2
  13. Slot_6 = 6
  14. [FileConstants]
  15. UtilityInf      = "UTILITY.INF"
  16. subroutineinf   = "SUBROUTN.INF"
  17. SoftwareType    = "driver"
  18. Exit_Code       = 0
  19. NetEventDLL     = "%SystemRoot%\System32\netevent.dll"
  20. IoLogMsgDLL     = "%SystemRoot%\System32\IoLogMsg.dll"
  21. SlotList = ^(SlotChoices, 1)
  22. Manufacturer    = "Microsoft"
  23. ProductMajorVersion     = "4"
  24. ProductMinorVersion     = "0"
  25. ProductVersion  = $(ProductMajorVersion)"."$(ProductMinorVersion)
  26. ProductSoftwareName     = "Lance"
  27. ProductSoftwareImagePath = "\SystemRoot\System32\drivers\lance.sys"
  28. NetRuleSoftwareType     = "lanceSys ndisDriver lanceDriver"
  29. NetRuleSoftwareUse      = $(SoftwareType)
  30. NetRuleSoftwareBindForm = """LanceSys"" yes no container"
  31. NetRuleSoftwareClass    = {"lanceDriver basic"}
  32. ProductHardwareName     = "Lance"
  33. NetRuleHardwareType     = "decstat decstatAdapter"
  34. NetRuleHardwareBindForm = " yes yes container"
  35. NetRuleHardwareClass    = {"decstatAdapter basic"}
  36. ProductOpSupport     = 132 
  37. ProductKeyName  = $(!NTN_SoftwareBase)"\"$(Manufacturer)"\"$(ProductSoftwareName)"\CurrentVersion"
  38. ParamKeyName    = $(!NTN_ServiceBase)$(ProductHardwareName)"\Parameters"
  39. [GeneralConstants]
  40. from      = ""
  41. to        = ""
  42. ExitCodeOk     = 0
  43. ExitCodeCancel = 1
  44. ExitCodeFatal  = 2
  45. KeyNull         = ""
  46. MAXIMUM_ALLOWED   = 33554432
  47. RegistryErrorIndex = NO_ERROR
  48. KeyProduct      = ""
  49. KeyParameters   = ""
  50. TRUE            = 1
  51. FALSE           = 0
  52. NoTitle            = 0
  53. ExitState   = "Active"
  54. OldVersionExisted = $(FALSE)
  55. DriverPath      = $(!STF_NTPATH)\drivers
  56. [date]
  57.     Now = {} ? $(!LIBHANDLE) GetSystemDate
  58. [Identify]
  59.     read-syms Identification
  60.     set Status     = STATUS_SUCCESSFUL
  61.     set Identifier = $(OptionType)
  62.     set Media      = #("Source Media Descriptions", 1, 1)
  63.     Return $(Status) $(Identifier) $(Media)
  64. [ReturnOptions]
  65.     set Status        = STATUS_FAILED
  66.     set OptionList     = {}
  67.     set OptionTextList = {}
  68.     set LanguageList = ^(LanguagesSupported, 1)
  69.     Ifcontains(i) $($0) in $(LanguageList)
  70.         ifstr(i) $($1) == ""
  71.            goto returnoptions
  72.         endif
  73.         set PlatformList = ^(PlatformsSupported, 1)
  74.         Ifcontains(i) $($1) in $(PlatformList)
  75.            goto returnoptions
  76.         else
  77.            set Status = STATUS_NOTSUPPORTED
  78.            goto finish_ReturnOptions
  79.         endif
  80.     else
  81.         set Status = STATUS_NOLANGUAGE
  82.         goto finish_ReturnOptions
  83.     endif
  84. returnoptions = +
  85.     set OptionList     = ^(Options, 1)
  86.     set OptionTextList = ^(OptionsText$($0), 1)
  87.     set Status         = STATUS_SUCCESSFUL
  88. finish_ReturnOptions = +
  89.     Return $(Status) $(OptionList) $(OptionTextList)
  90. [InstallOption]
  91.     set Option   = $($1)
  92.     set SrcDir   = $($2)
  93.     set AddCopy  = $($3)
  94.     set DoCopy   = $($4)
  95.     set DoConfig = $($5)
  96.     set LanguageList = ^(LanguagesSupported, 1)
  97.     Ifcontains(i) $($0) NOT-IN $(LanguageList)
  98.         Return STATUS_NOLANGUAGE
  99.     endif
  100.     Debug-Output "OEMNADDE.INF: STF_CWDIR is: "$(!STF_CWDIR)
  101.     Debug-Output "OEMNADDE.INF: STF_LANGUAGE is: "$(!STF_LANGUAGE)
  102.     set-subst LF = "\n"
  103.     read-syms GeneralConstants
  104.     read-syms FileConstants
  105.     Shell $(UtilityInf), GetBindingInfo, "DEC"
  106.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  107.         Debug-Output "ShellCode error: cannot get an error string."
  108.         goto ShellCodeError
  109.     endif
  110.     set NetRuleSoftwareBindable = $($R1)
  111.     read-syms DialogConstants$(!STF_LANGUAGE)
  112.     ifstr(i) $(!NTN_Origination) == "NCPA"
  113.         set Continue = $(OK)
  114.     endif
  115.     read-syms FileConstants$(!STF_LANGUAGE)
  116.     detect date
  117.     set-title  $(FunctionTitle)
  118.     set to   = Begin
  119.     set from = Begin
  120.     set CommonStatus = STATUS_SUCCESSFUL
  121.     EndWait
  122. Begin = +
  123.     Ifstr(i) $(!NTN_InstallMode) == deinstall
  124.         set StartLabel = removeadapter
  125.     else-Ifstr(i) $(!NTN_InstallMode) == Update
  126.         set StartLabel = UpgradeSoftware
  127.     else-Ifstr(i) $(!NTN_InstallMode) == bind
  128.         set StartLabel = bindingadapter
  129.     else-Ifstr(i) $(!NTN_InstallMode) == configure
  130.         set CommonStatus = STATUS_REBOOT
  131.         set StartLabel = configureadapter
  132.         Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  133.             Debug-Output "Cannot configure the DEC 100 driver software."
  134.             Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_SOFTWARE
  135.         else
  136.             Shell $(UtilityInf),RegistryErrorString,CANNOT_CONFIGURE_HARDWARE
  137.         endif
  138.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  139.             Debug-Output "ShellCode error: cannot get an error string."
  140.             goto ShellCodeError
  141.         endif
  142.         set Error = $($R0)
  143.         set from = end
  144.         set to = end
  145.         goto nonfatalinfo
  146.     else
  147.         set StartLabel = installadapter
  148.         set OEM_ABANDON_OPTIONS = {}
  149.         set OEM_ABANDON_SOFTWARE = FALSE
  150.         set OEM_ABANDON_ON = TRUE
  151.     endif
  152.     set SlotNum = 1
  153.     set from = $(fatal)
  154.     set to = $(fatal)
  155.     goto $(StartLabel)
  156. installadapter = +
  157.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  158.     Ifstr $(KeyProduct) != $(KeyNull)
  159.         CloseRegKey $(KeyProduct)
  160.         ifstr(i) !(NTN_RegBase) == $(ProductKeyName)
  161.            Shell $(UtilityInf), VerExistedDlg, $(ProductSoftwareTitle),+
  162.                $(ProductVersion)
  163.            ifint $($ShellCode) != $(!SHELL_CODE_OK)
  164.                Debug-Output "ShellCode error: cannot get an error string."
  165.                goto ShellCodeError
  166.            endif
  167.            goto end
  168.         else
  169.            Shell $(UtilityInf), CardExistedDlg
  170.            ifint $($ShellCode) != $(!SHELL_CODE_OK)
  171.                Debug-Output "ShellCode error: cannot get an error string."
  172.                goto ShellCodeError
  173.            endif
  174.            ifstr(i) $($R1) != "OK"
  175.                set CommonStatus = STATUS_USERCANCEL
  176.                goto end
  177.            endif
  178.            set OldVersionExisted = $(TRUE)
  179.         endif
  180.     endif
  181.     goto adapteroptions
  182. configureadapter = +
  183.     goto end
  184. adapteroptions = +
  185.     set from = adapteroptions
  186.     ifstr(i) $(!STF_GUI_UNATTENDED) == "YES"
  187.         ifstr(i) $(!AutoNetInterfaceType) != ""
  188.             set BusInterfaceType = $(!AutoNetInterfaceType)
  189.         else
  190.             set BusInterfaceType = 1    
  191.         endif
  192.         ifstr(i) $(!AutoNetBusNumber) != ""
  193.             set BusNumber = $(!AutoNetBusNumber)
  194.         else
  195.             set BusNumber = 0
  196.         endif
  197.         goto nextstep
  198.     endif
  199.     ifstr(i) $(!STF_NCDETINFO) == {}
  200.         Shell $(UtilityInf),GetBusTypeDialog,$(ProductHardwareDescription), "1", "0"
  201.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  202.             Debug-Output "ShellCode error."
  203.             goto ShellCodeError
  204.         endif
  205.         set BusInterfaceType = $($R1)
  206.         set BusNumber = $($R2)
  207.     else
  208.         set BusInterfaceType = *($(!STF_NCDETINFO),5)
  209.         set BusNumber = *($(!STF_NCDETINFO),6)
  210.     endif
  211. nextstep = +
  212.     ifint $(OldVersionExisted) == $(TRUE)
  213.         ifstr(i) $(!NTN_InstallMode) == configure
  214.             goto writeparameters
  215.         endif
  216.     endif
  217.     StartWait
  218.     ifint $(OldVersionExisted) == $(FALSE)
  219.         Ifstr(i) $(DoCopy) == "YES"
  220.            Shell $(UtilityInf), DoAskSource, $(!STF_CWDDIR), $(SrcDir) YES
  221.            Ifint $($ShellCode) != $(!SHELL_CODE_OK)
  222.                Goto ShellCodeError
  223.            Else-Ifstr(i) $($R0) == STATUS_FAILED
  224.                Shell $(UtilityInf) RegistryErrorString "ASK_SOURCE_FAIL"
  225.                ifint $($ShellCode) != $(!SHELL_CODE_OK)
  226.                   goto ShellCodeError
  227.                endif
  228.                set Error = $($R0)
  229.                Goto fatal
  230.            Else-Ifstr(i) $($R0) == STATUS_USERCANCEL
  231.                Goto successful
  232.            Endif
  233.            Set SrcDir = $($R1)
  234.         Endif
  235.         install "Install-Option"
  236.         ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  237.            Shell $(UtilityInf) RegistryErrorString "UNABLE_COPY_FILE"
  238.            ifint $($ShellCode) != $(!SHELL_CODE_OK)
  239.                goto ShellCodeError
  240.            endif
  241.            set Error = $($R0)
  242.            goto fatal
  243.         endif
  244.         Shell $(UtilityInf), AddSoftwareComponent, $(Manufacturer), +
  245.             $(ProductSoftwareName), +
  246.             $(ProductSoftwareName), +
  247.             $(ProductSoftwareTitle), $(STF_CONTEXTINFNAME), +
  248.             $(ProductSoftwareImagePath), "kernel", "NDIS", {}, "",+
  249.             $(NetEventDLL)
  250.         Set OEM_ABANDON_SOFTWARE = TRUE
  251.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  252.             Debug-Output "ShellCode error"
  253.             goto ShellCodeError
  254.         endif
  255.         set RegistryErrorIndex = $($R0)
  256.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  257.             EndWait
  258.             Debug-Output "Registry error: add software components"
  259.             CloseRegKey $($R1)
  260.             CloseRegKey $($R2)
  261.             CloseRegKey $($R3)
  262.             CloseRegKey $($R4)
  263.             CloseRegKey $($R5)
  264.             goto fatalregistry
  265.         endif
  266.         set SoftProductKey      = $($R1)
  267.         Set SoftNetRuleKey      = $($R2)
  268.         Set SoftServiceKey      = $($R3)
  269.         Set SoftParameterKey    = $($R4)
  270.         Set SoftLinkageKey      = $($R5)
  271.         set NewValueList = {{SoftwareType,$(NoTitle),$(!REG_VT_SZ),$(SoftwareType)},+
  272.                            {MajorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMajorVersion)},+
  273.                            {MinorVersion,$(NoTitle),$(!REG_VT_DWORD),$(ProductMinorVersion)},+
  274.                            {Title,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareTitle)},+
  275.                            {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareDescription)},+
  276.                            {ServiceName,$(NoTitle),$(!REG_VT_SZ),$(ProductSoftwareName)},+
  277.                            {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  278.         Shell  $(UtilityInf), AddValueList, $(SoftProductKey), $(NewValueList)
  279.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  280.             Debug-Output "ShellCode error."
  281.             goto ShellCodeError
  282.         endif
  283.         set RegistryErrorIndex = $($R0)
  284.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  285.             EndWait
  286.             Debug-Output "Resgitry error: add value list."
  287.             CloseRegKey $(SoftProductKey)
  288.             CloseRegKey $(SoftNetRuleKey)
  289.             CloseRegKey $(SoftServiceKey)
  290.             CloseRegKey $(SoftParameterKey)
  291.             CloseRegKey $(SoftLinkageKey)
  292.             goto fatalregistry
  293.         endif
  294.         set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareType)},+
  295.                             {use,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareUse)}, +
  296.                             {bindform,$(NoTitle),$(!REG_VT_SZ),$(NetRuleSoftwareBindForm)}, +
  297.                             {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareClass)}, +
  298.                             {bindable,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleSoftwareBindable)}, +
  299.                             {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}
  300.         Shell  $(UtilityInf), AddValueList, $(SoftNetRuleKey), $(NewValueList)
  301.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  302.             Debug-Output "ShellCode error."
  303.             goto ShellCodeError
  304.         endif
  305.         set RegistryErrorIndex = $($R0)
  306.         CloseRegKey $(SoftProductKey)
  307.         CloseRegKey $(SoftNetRuleKey)
  308.         CloseRegKey $(SoftServiceKey)
  309.         CloseRegKey $(SoftParameterKey)
  310.         CloseRegKey $(SoftLinkageKey)
  311.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  312.             EndWait
  313.             Debug-Output "Resgitry error: add value list."
  314.             goto fatalregistry
  315.         endif
  316.     endif
  317.     Shell $(UtilityInf), AddHardwareComponent,$(ProductHardwareName),$(STF_CONTEXTINFNAME),$(ProductKeyName)
  318.     ifint $($R4) != -1
  319.         Set OEM_ABANDON_OPTIONS = >($(OEM_ABANDON_OPTIONS), $(!NTN_SoftwareBase)"\Microsoft\Windows NT\CurrentVersion\NetworkCards\"$($R4))
  320.     endif
  321.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  322.         Debug-Output "Cannot add hardware component"
  323.         goto ShellCodeError
  324.     endif
  325.     set RegistryErrorIndex = $($R0)
  326.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  327.         EndWait
  328.         Debug-Output "Registry error: add hardware component"
  329.         Debug-Output $(RegistryErrorIndex)
  330.         CloseRegKey $($R1)
  331.         CloseRegKey $($R2)
  332.         CloseRegKey $($R3)
  333.         goto fatalregistry
  334.     endif
  335.     set KeyParameters = $($R3)
  336.     set KeyAdapterRules = $($R2)
  337.     set AdapterNumber = $($R4)
  338.     set NewValueList = {{Manufacturer,$(NoTitle),$(!REG_VT_SZ),$(Manufacturer)},+
  339.                        {Title,$(NoTitle),$(!REG_VT_SZ),"["$($R4)"] "$(ProductHardwareTitle)},+
  340.                        {Description,$(NoTitle),$(!REG_VT_SZ),$(ProductHardwareDescription)},+
  341.                        {ProductName,$(NoTitle),$(!REG_VT_SZ),$(ProductHardwareName)},+
  342.                        {ServiceName,$(NoTitle),$(!REG_VT_SZ),$($R5)},+
  343.                        {OperationsSupport,$(NoTitle),$(!REG_VT_DWORD),$(ProductOpSupport)},+
  344.                        {InstallDate,$(NoTitle),$(!REG_VT_DWORD),*($(Now),1)}}
  345.     Shell  $(UtilityInf), AddValueList, $($R1), $(NewValueList)
  346.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  347.         Debug-Output "ShellCode error"
  348.         goto ShellCodeError
  349.     endif
  350.     CloseRegKey $($R1)
  351.     set TempProdName = """"$(ProductHardwareName)$(AdapterNumber)""""
  352.     set TempBindForm = $(TempProdName)$(NetRuleHardwareBindForm)
  353.     set NewValueList = {{type,$(NoTitle),$(!REG_VT_SZ),$(NetRuleHardwareType)},+
  354.                         {bindform,$(NoTitle),$(!REG_VT_SZ),$(TempBindForm)}, +
  355.                         {class,$(NoTitle),$(!REG_VT_MULTI_SZ),$(NetRuleHardwareClass)}, +
  356.                         {InfOption,$(NoTitle),$(!REG_VT_SZ),$(Option)}}
  357.     Shell  $(UtilityInf), AddValueList, $(KeyAdapterRules), $(NewValueList)
  358.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  359.         Debug-Output "ShellCode error."
  360.         goto ShellCodeError
  361.     endif
  362.     set RegistryErrorIndex = $($R0)
  363.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  364.         EndWait
  365.         Debug-Output "Resgitry error: add value list."
  366.         CloseRegKey $(KeyParameters)
  367.         CloseRegKey $(KeyAdapterRules)
  368.         goto fatalregistry
  369.     endif
  370.     CloseRegKey $(KeyAdapterRules)
  371.     goto writeparameters
  372. writeparameters = +
  373.     set CardTypeValue = 4
  374.     set NewValueList = {+
  375.                        {MediaType,$(NoTitle),$(!REG_VT_DWORD),1},+
  376.                        {BusType,$(NoTitle),$(!REG_VT_DWORD),$(BusInterfaceType)},+
  377.                        {BusNumber,$(NoTitle),$(!REG_VT_DWORD),$(BusNumber)},+
  378.                        {CardType,$(NoTitle),$(!REG_VT_DWORD),$(CardTypeValue)}+
  379.                        }
  380.     Shell  $(UtilityInf), AddValueList, $(KeyParameters), $(NewValueList)
  381.     CloseRegKey $(KeyParameters)
  382.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  383.         Debug-Output "ShellCode error."
  384.         goto ShellCodeError
  385.     endif
  386.     set RegistryErrorIndex = $($R0)
  387.     Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  388.         Debug-Output "Registry error: Add value list"
  389.         goto fatalregistry
  390.     endif
  391.     EndWait
  392.     goto successful
  393. bindingadapter =+
  394.     set Error = "Binding: Sorry, not yet implemented."
  395.     goto fatal
  396. removeadapter = +
  397.     Ifstr(i) $(ProductKeyName) == $(!NTN_RegBase)
  398.         Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  399.             $(ProductSoftwareName)
  400.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  401.             Debug-Output "ShellCode error"
  402.             goto ShellCodeError
  403.         endif
  404.         set RegistryErrorIndex = $($R0)
  405.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  406.             goto fatalregistry
  407.         endif
  408.     else
  409.         Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  410.             $(ProductSoftwareName), $(!NTN_RegBase)
  411.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  412.             Debug-Output "ShellCode error"
  413.             goto ShellCodeError
  414.         endif
  415.         set RegistryErrorIndex = $($R0)
  416.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  417.             goto fatalregistry
  418.         endif
  419.     endif
  420.     goto end
  421. UpgradeSoftware = +
  422.     OpenRegKey $(!REG_H_LOCAL) "" $(ProductKeyName) $(MAXIMUM_ALLOWED) KeyProduct
  423.     Ifstr $(KeyProduct) != $(KeyNull)
  424.         install "Install-Update"
  425.         ifstr(i) $(STF_INSTALL_OUTCOME) != STF_SUCCESS
  426.             goto fatal
  427.         endif
  428.         SetRegValue $(KeyProduct) {MajorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMajorVersion)}
  429.         SetRegValue $(KeyProduct) {MinorVersion,$(NoTitle),$(!REG_VT_SZ),$(ProductMinorVersion)}
  430.         CloseRegKey $(KeyProduct)
  431.     else
  432.         goto fatalregistry
  433.     endif
  434.     set iSearch = 1
  435. nextnetcard = +
  436.     Shell $(UtilityInf), FindNextNetworkCard, $(ProductHardwareName), $(iSearch)
  437.     set KeyNetcard = $($R0)
  438.     set iSearch = $($R1)
  439.     Debug-Output "OemNadEp.Inf: FindNextNetworkCard "$(KeyNetcard)","$(iSearch)
  440.     Ifstr $(KeyNetcard) != $(KeyNull)
  441.         Debug-Output "OemNadEp.Inf: Setting OperationsSupport value"
  442.         SetRegValue $(KeyNetcard) {OperationsSupport,$(NoTitle),$(!REG_VT_DWORD),$(ProductOpSupport)}
  443.         CloseRegKey $(KeyNetcard)
  444.         goto nextnetcard
  445.     Endif
  446.     goto end
  447. successful = +
  448.     goto end
  449. abandon = +
  450.     ForListDo $(OEM_ABANDON_OPTIONS)
  451.         Shell $(UtilityInf), RemoveHardwareComponent, $(Manufacturer), +
  452.             $(ProductSoftwareName), $($)
  453.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  454.             Debug-Output "ShellCode error"
  455.             goto ShellCodeError
  456.         endif
  457.         set RegistryErrorIndex = $($R0)
  458.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  459.             goto fatalregistry
  460.         endif
  461.     EndForListDo
  462.     Ifstr(i) $(OEM_ABANDON_SOFTWARE) == TRUE
  463.         Shell $(UtilityInf), RemoveSoftwareComponent, $(Manufacturer), +
  464.             $(ProductSoftwareName), FALSE
  465.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  466.             Debug-Output "ShellCode error"
  467.             goto ShellCodeError
  468.         endif
  469.         set RegistryErrorIndex = $($R0)
  470.         Ifstr(i) $(RegistryErrorIndex) != NO_ERROR
  471.             goto fatalregistry
  472.         endif
  473.     endif
  474.     goto end
  475. warning = +
  476.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "WARNING", $(Error)
  477.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  478.         goto ShellCodeError
  479.     endif
  480.     ifstr(i) $($R1) == "OK"
  481.         goto $(to)
  482.     else-ifstr(i) $($R1) == "CANCEL"
  483.         goto $(from)
  484.     else
  485.         goto "end"
  486.     endif
  487. nonfatalinfo = +
  488.     Set CommonStatus = STATUS_USERCANCEL
  489.     Set Severity = STATUS
  490.     goto nonfatalmsg
  491. nonfatal = +
  492.     Set Severity = NONFATAL
  493.     goto nonfatalmsg
  494. nonfatalmsg = +
  495.     ifstr(i) $(Error) == ""
  496.         Set Severity = NONFATAL
  497.         Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  498.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  499.             goto ShellCodeError
  500.         endif
  501.         set Error = $($R0)
  502.     endif
  503.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), $(Severity), $(Error)
  504.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  505.         goto ShellCodeError
  506.     endif
  507.     ifstr(i) $($R1) == "OK"
  508.         goto $(from)
  509.     else
  510.         goto "end"
  511.     endif
  512. fatalregistry = +
  513.     Shell $(UtilityInf) RegistryErrorString $(RegistryErrorIndex)
  514.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  515.         goto ShellCodeError
  516.     endif
  517.     set Error = $($R0)
  518.     goto fatal
  519. fatal = +
  520.     ifstr(i) $(Error) == ""
  521.         Shell $(UtilityInf) RegistryErrorString "SETUP_FAIL"
  522.         ifint $($ShellCode) != $(!SHELL_CODE_OK)
  523.             goto ShellCodeError
  524.         endif
  525.         set Error = $($R0)
  526.     endif
  527.     Shell $(subroutineinf) SetupMessage, $(!STF_LANGUAGE), "FATAL", $(Error)
  528.     ifint $($ShellCode) != $(!SHELL_CODE_OK)
  529.         goto ShellCodeError
  530.     endif
  531.     goto setfailed
  532. ShellCodeError = +
  533.     set DlgType      = "MessageBox"
  534.     set STF_MB_TITLE = $(ShellCodeErrorTitle)
  535.     set STF_MB_TEXT  = $(ShellCodeErrorText)
  536.     set STF_MB_TYPE  = 1
  537.     set STF_MB_ICON  = 3
  538.     set STF_MB_DEF   = 1
  539.     ui start "Error Message"
  540.     goto setfailed
  541. setfailed = +
  542.     set CommonStatus = STATUS_FAILED
  543.     ifstr(i) $(OEM_ABANDON_ON) == TRUE
  544.         set OEM_ABANDON_ON = FALSE
  545.         goto abandon
  546.     endif
  547.     goto end
  548. end = +
  549.     goto term
  550. term = +
  551.     Return $(CommonStatus)
  552. [Install-Option]
  553.     set STF_VITAL = ""
  554.     ifstr(i) $(AddCopy) == "YES"
  555.         AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers
  556.     endif
  557.     ifstr(i) $(DoCopy) == "YES"
  558.        set !STF_NCPA_FLUSH_COPYLIST = TRUE
  559.        CopyFilesInCopyList
  560.     endif
  561.     ifstr(i) $(DoConfig) == "YES"
  562.     endif
  563.     Exit
  564. [Install-Update]
  565.    set STF_VITAL        = ""
  566.    set STF_OVERWRITE    = "VERIFYSOURCEOLDER"
  567.    AddSectionFilesToCopyList Files-$(Option) $(SrcDir) $(!STF_WINDOWSSYSPATH)\drivers
  568.    exit
  569. [Source Media Descriptions]
  570.     1 = "Windows NT Server CD-ROM", TAGFILE = cdrom_s.40
  571. [Signature]
  572.     FileType = MICROSOFT_FILE
  573. [GetSignature]
  574.     read-syms Signature
  575.     return $(FileType)
  576. [ProductType]
  577. STF_PRODUCT  = LanmanNT
  578. STF_PLATFORM = I386
  579. [Files-Inf]
  580. 2,    oemsetup.inf,     SIZE=1000,    RENAME=$(!UG_Filename)
  581. [Files-DECSTAT]
  582. 1,LANCE.SYS , SIZE=999
  583. [LanguagesSupported]
  584.     ENG
  585. [OptionsTextENG]
  586.     DECSTAT     = "DEC Turbo Channel Ethernet Adapter"
  587. [FileConstantsENG]
  588. ProCaption   = "Windows NT Setup"
  589. ProCancel    = "Cancel"
  590. ProCancelMsg = "Windows NT Networking is not correctly installed.  "+
  591.                "Are you sure you want to cancel copying files?"
  592. ProCancelCap = "Network Setup Message"
  593. ProText1     = "Copying:"
  594. ProText2     = "To:"
  595. FunctionTitle   = "DEC Turbo Channel Setup"
  596. ProductSoftwareDescription      = "DEC Lance Adapter Driver"
  597. ProductHardwareDescription      = "DEC Turbo Channel Ethernet Adapter"
  598. ProductSoftwareTitle    = "DEC Lance Adapter Driver"
  599. ProductHardwareTitle    = "DEC Turbo Channel Ethernet Adapter"
  600. ShellCodeErrorTitle     = "Error: "$(FunctionTitle)
  601. ShellCodeErrorText      = "Shell Code Error."
  602. [DialogConstantsENG]
  603. Help        = "&Help"
  604. Exit        = "Cancel"
  605. OK          = "OK"
  606. HelpContext = ""
  607. Continue    = "Continue"
  608. Cancel      = "Cancel"
  609. [DecstationDlgENG]
  610. Label1 = "&Slot Number:"
  611. DlgType = "MultiCombo"
  612. DlgTemplate = "SINGLE_COMBO"
  613. Caption = $(FunctionTitle)
  614. Combo1List = $(SlotList)
  615. Combo1Out  = $(SlotNum)
  616. ComboListItemsIn  = {Combo1List}
  617. ComboListItemsOut = {Combo1Out}
  618. HelpContext = $(!IDH_DB_OEMNADDE_INS)
  619.